home *** CD-ROM | disk | FTP | other *** search
/ DS-CD ROM 2 1993 August / DS CD-ROM 2.Ausgabe (August 1993).iso / programm / ds0256 / install.bat < prev    next >
DOS Batch File  |  1992-11-30  |  15KB  |  460 lines

  1. @ECHO OFF
  2. REM -----------------------------------------------
  3. REM INSTALL V2.05 - Installierungs-Datei für MDEBUG
  4. REM (c) 1992 Bernd Schemmer
  5. REM -----------------------------------------------
  6. REM Für 4DOS ab Version 3 auf BTM umschalten!
  7. IF %@eval[2+2] == 4 LOADBTM ON
  8. BREAK ON
  9. CLS
  10. SET VERSION=V2.05
  11. IF NOT "%VERSION%" == "V2.05" GOTO EnvError
  12. ECHO. INSTALL - Entpacken der Archive von MDEBUG %VERSION%
  13. ECHO.
  14. REM ----- Testen, ob die Datei von der richtigen Diskette gestartet wurde
  15. IF EXIST START.DOC GOTO DiskOk
  16. ECHO. ***** INSTALL fataler Fehler: Falsche Start-Diskette benutzt!
  17. ECHO.
  18. ECHO. ***** INSTALL.BAT kann nur von der Original-Diskette der Shareware-
  19. ECHO. ***** Version oder der ERSTEN (und evtl. einzigen) Diskette der 
  20. ECHO. ***** Vollversion (bzw. einer Kopie einer dieser beiden Disketten) 
  21. ECHO. ***** gestartet werden!
  22. GOTO ENDE0
  23. :DiskOk
  24. ECHO. Initialisiere die Variablen. Bitte warten, das dauert etwas ...
  25. ECHO. [evtl. Fehlermeldungen wie 'Kein Platz mehr im Umgebungsbereich' können
  26. ECHO. ignoriert werden, da sie von INSTALL behandelt werden!]
  27. ECHO.
  28. REM ----- Environment-Variablen vorbelegen
  29. SET  RETADR=xxxxxxxxxx
  30. SET RETADR1=xxxxxxxxxx
  31. SET    FILE=xxxxxxxxxx
  32. SET     EXT=xxxxxxxxxx
  33. SET IGNOREERROR=xxx
  34. SET art=SHARE
  35. SET Z_LW=C:
  36. SET Q_LW=A:
  37. SET MKDIRS=+
  38. REM ----- Auswerten der Parameter
  39. IF NOT %5. == . GOTO Switch1Error
  40. IF %1. == ?.  GOTO HELP
  41. IF %1. == /?. GOTO HELP
  42. IF %1. == -?. GOTO HELP
  43. IF NOT %1. == . SET Z_LW=%1
  44. IF NOT %2. == . SET Q_LW=%2
  45. IF NOT %3. == . SET MKDIRS=%3
  46. REM ----- Testen, ob die Environment-Variablen erstellt werden konnten
  47. SET TESTFILE=***TESTFILE***
  48. IF NOT %TESTFILE%. == ***TESTFILE***. GOTO EnvError
  49.  
  50. REM ----- Parameter überprüfen
  51. IF %4. == X. GOTO LwOK2
  52. IF %4. == x. GOTO LwOK2
  53. IF NOT %4. == . GOTO Switch1Error
  54.  
  55. IF %Z_LW%. == C:. GOTO LwOK1
  56. IF %Z_LW%. == c:. GOTO LwOK1
  57. IF %Z_LW%. == D:. GOTO LwOK1
  58. IF %Z_LW%. == d:. GOTO LwOK1
  59. GOTO TargetError
  60. :LwOK1
  61. IF %Q_LW%. == A:. GOTO LwOK2
  62. IF %Q_LW%. == a:. GOTO LwOK2
  63. IF %Q_LW%. == B:. GOTO LwOK2
  64. IF %Q_LW%. == b:. GOTO LwOK2
  65. GOTO SourceError
  66. :LwOK2
  67. IF %MKDIRS%. == +. GOTO SwitchOK
  68. IF NOT %MKDIRS%. == -. GOTO SwitchError
  69. :SwitchOK
  70. CLS
  71. ECHO. ┌─────────────────────────────────────────────────────────────────────┐
  72. ECHO. │ INSTALL.BAT - Batchdatei zum Entpacken der Archive von MDEBUG %VERSION% │
  73. ECHO. └─────────────────────────────────────────────────────────────────────┘
  74. ECHO.
  75. IF %MKDIRS%. == -. GOTO S1
  76. ECHO. INSTALL erstellt im aktuellen Directory von %Z_LW% folgende Directorys:
  77. ECHO.
  78. ECHO. akt. Directory
  79. ECHO. ─────────────┐
  80. ECHO.              │
  81. ECHO.              ├──\MDEBUG  Inhalt: Das Hauptprogramm und die Utils
  82. ECHO.              │
  83. ECHO.              ├──\SOURCE  Inhalt: Die Quelltexte der Utils
  84. ECHO.              │
  85. ECHO.              └──\DOC     Inhalt: Die Dokumentation zu MDEBUG %VERSION%
  86. GOTO S2
  87. :S1
  88. ECHO. Die Directorys MDEBUG, SOURCE und DOC existieren bereits im aktuellen
  89. ECHO. Directory des Laufwerks %Z_LW%.
  90. :S2
  91. ECHO.
  92. ECHO.                                       ┌────┐                  ┌────┐
  93. ECHO. Installiere MDEBUG %VERSION% vom Laufwerk │ %Q_LW% │ aus ins Laufwerk │ %Z_LW% │.
  94. ECHO.                                       └────┘                  └────┘
  95. ECHO.
  96. ECHO. Das aktuelle Directory von %Z_LW% ist:
  97. CD %Z_LW%
  98. ECHO.
  99. ECHO. Soll ich fortfahren [CTRL-C für Abbruch, sonst: fortfahren]?
  100. ECHO. (INSTALL ? [RETURN] für Hilfe)
  101. PAUSE >NUL
  102. CLS
  103. ECHO. Installiere MDEBUG %VERSION% im aktuellen Directory des Laufwerks %Z_LW% ...
  104. ECHO.
  105.  
  106. %Z_LW%
  107. IF %MKDIRS%. == -. GOTO DirsExist
  108. ECHO.
  109. ECHO. ***** Erstelle die Directorys MDEBUG, SOURCE und DOC ...
  110. MD MDEBUG >NUL
  111. MD SOURCE >NUL
  112. MD DOC >NUL
  113. :DirsExist
  114.  
  115. REM ----- Testen, ob die Directorys existieren
  116. IF NOT EXIST %Z_LW%DOC\CON    GOTO DirectoryError
  117. IF NOT EXIST %Z_LW%SOURCE\CON GOTO DirectoryError
  118. IF NOT EXIST %Z_LW%MDEBUG\CON GOTO DirectoryError
  119.  
  120. ECHO. ***** Installiere MDEBUG %VERSION% ...
  121. copy %Q_LW%*.doc doc\*.* >NUL
  122. IF EXIST %Q_LW%show.* copy %Q_LW%show.* doc\*.* >NUL
  123.  
  124. REM ----- Entpacken des Archivs MDEBUG1.EXE
  125. cd MDEBUG
  126. SET FILE=MDEBUG1
  127. SET TESTFILE=MDDISDRV.COM
  128. SET EXT=.EXE
  129. SET RETADR1=LABEL1
  130. GOTO InstallArchiv
  131. :LABEL1
  132. IF NOT %IGNOREERROR%. == . GOTO ErrorIgnored1
  133. ECHO. ***** Verteile die Dateien auf die Directorys ...
  134. copy *.a86 ..\source\*.* >NUL
  135. copy *.obj ..\source\*.* >NUL
  136. copy testmd.* ..\source\*.* >NUL
  137. del *.a86 >NUL
  138. del *.obj >NUL
  139. del testmd.* >NUL
  140.  
  141. :ErrorIgnored1
  142. REM ----- Entpacken der Dokumentation zu MDEBUG (Teil 1)
  143. cd ..\doc
  144. SET FILE=MDEBUG21
  145. SET TESTFILE=MDEBUG.PRT
  146. SET EXT=.EXE
  147. SET RETADR1=LABEL2
  148. GOTO InstallArchiv
  149. :LABEL2
  150.  
  151. REM ----- Entpacken der Dokumentation (Teil 2)
  152. SET FILE=MDEBUG22
  153. SET TESTFILE=WHATS.NEW
  154. SET EXT=.EXE
  155. SET RETADR1=LABEL3
  156. GOTO InstallArchiv
  157. :LABEL3
  158.  
  159. REM ----- Entpacken der zusätzlichen Utils aus der Vollversion
  160. IF NOT EXIST %Q_LW%MDEBUG.REG GOTO LABEL42
  161. IF EXIST %Q_LW%MDEBUG3.EXE GOTO LABEL41
  162. ECHO. ***** Bitte die Diskette 2 ins Laufwerk %Q_LW% einlegen und
  163. ECHO. ***** eine Taste drücken [CTRL-C für Abbruch] ...
  164. PAUSE >NUL
  165. :LABEL41
  166. SET art=VOLL
  167. cd ..\MDEBUG
  168. SET FILE=MDEBUG3
  169. SET TESTFILE=SETREGNR.EXE
  170. SET EXT=.EXE
  171. SET RETADR1=LABEL4
  172. GOTO InstallArchiv
  173.  
  174. :LABEL4
  175. IF NOT %IGNOREERROR%. == . GOTO LABEL42
  176. ECHO. ***** Verteile die Dateien auf die Directorys ...
  177. copy *.asm  ..\source >NUL
  178. copy *.in?  ..\source >NUL
  179. del *.asm >NUL
  180. del *.in? >NUL
  181. :LABEL42
  182.  
  183. REM ----- Entpacken der Dokumentation zu MDEBUG (Teil 3)
  184. REM
  185. IF NOT EXIST %Q_LW%MDEBUG23.EXE GOTO LABEL5
  186. cd ..\doc
  187. SET FILE=MDEBUG23
  188. SET TESTFILE=HISTORY.DOC
  189. SET EXT=.EXE
  190. SET RETADR1=LABEL5
  191. GOTO InstallArchiv
  192. :LABEL5
  193.  
  194. REM Hilfsvariablen Löschen
  195. SET RETADR=
  196. SET RETADR1=
  197. SET FILE=
  198. SET EXT=
  199. SET Z_LW=
  200. SET Q_LW=
  201. SET MKDIRS=
  202. SET TESTFILE=
  203. cd ..\doc
  204. CLS
  205. ECHO.
  206. ECHO. ================ Installation von MDEBUG beendet =============================
  207. ECHO.
  208. ECHO.    MDEBUG %VERSION% ist nun installiert.
  209. ECHO.
  210. ECHO.    Bitte lesen Sie sich vor der ersten Nutzung von MDEBUG die Dokumentation
  211. ECHO.    im Directory DOC durch!
  212. ECHO.    Vergessen Sie nicht Ihren Drucker vor dem Ausdruck der Dokumentation in
  213. ECHO.    einen Modus mit mindestens 100 Zeichen pro Zeile zu schalten!
  214. ECHO.
  215. IF "%art%" == "SHARE" GOTO LABEL6
  216. ECHO. ------------------- Nur für Besitzer der Vollversion: ------------------------
  217. ECHO.
  218. ECHO.    Beachten Sie bitte, daß Sie das Archiv PD_1.EXE noch manuell über den
  219. ECHO.    Aufruf
  220. ECHO.
  221. ECHO.       PD_1 [RETURN]
  222. ECHO.
  223. ECHO.    entpacken müssen!
  224. ECHO.    Am besten richten Sie auch für dieses Archiv ein eigenes Directory ein.
  225. ECHO.
  226. :LABEL6
  227. ECHO. ==============================================================================
  228. ECHO.
  229. GOTO ENDE
  230.  
  231. REM --------------------------
  232. REM
  233. REM Eingabe: %FILE%       = Name des Archivs
  234. REM          %EXT%        = Extension des Archivs
  235. REM          %RETADR1%    = Label, an dem die Programmausführung nach dem
  236. REM                         Ende der Routine fortgeführt werden soll
  237. REM          %TESTFILE%   = Datei, die nach dem Entpacken vorhanden sein muß
  238. REM
  239. :INSTALLARCHIV
  240. SET RETADR=INSTALLArchiv
  241. IF NOT EXIST %Q_LW%%FILE%%EXT%  GOTO PromptUser1
  242. ECHO.
  243. ECHO. ***** Entpacke das Archiv %FILE%%EXT% ...
  244. SET IgnoreError=
  245. %Q_LW%%FILE%%EXT%
  246. IF ERRORLEVEL == 1 GOTO ArchivERROR
  247. IF NOT EXIST %TESTFILE% GOTO ArchivError
  248. ECHO.
  249. ECHO. ***** %FILE%%EXT% entpackt.
  250. GOTO %RETADR1%
  251.  
  252. REM --------------------------
  253. REM
  254. REM Eingabe: %RETADR1%    = Label, an dem die Programmausführung nach dem
  255. REM                         Ende der Routine fortgeführt werden soll
  256. REM
  257. :ArchivERROR
  258. ECHO.
  259. ECHO. ***** Fehler beim Entpacken des Archivs %Q_LW%%FILE%%EXT% aufgetreten!
  260. ECHO.       (z.B. Disk %Z_LW% ist voll oder es wurde CTRL-C gedrückt)
  261. ECHO.
  262. ECHO. ***** Bitte eine Taste zur Fortsetzung der Installation drücken
  263. ECHO. ***** [CTRL-C für Abbruch] ...
  264. SET IgnoreError=YES
  265. PAUSE >NUL
  266. ECHO. ***** Installation wird fortgesetzt ...
  267. GOTO %RETADR1%
  268.  
  269. REM --------------------------
  270. :EnvError
  271. CLS
  272. ECHO. ***** INSTALL Fehler: Nicht genügend Platz im Umgebungsbereich *****
  273. ECHO. ******                                        (= Environment)  *****
  274. ECHO.
  275. ECHO. Zur Ausführung dieser Datei müssen Sie den Platz im Environment erhöhen.
  276. ECHO. Falls Ihr Kommando-Interpreter der COMMAND.COM ist müssen Sie hierzu in
  277. ECHO. der Datei CONFIG.SYS die Zeile
  278. ECHO.
  279. ECHO.      SHELL=d:\COMMAND.COM /e:nnnnn /p
  280. ECHO.
  281. ECHO. einfügen oder editieren und den Computer neustarten.
  282. ECHO. Hierbei ist 'd:' das Verzeichnis, in dem der COMMAND.COM steht und 
  283. ECHO. 'nnnnn' die Größe des Environments in Byte. (siehe auch DOS-Handbuch)
  284. ECHO.
  285. ECHO. Falls Sie diese Änderung des Systems nicht wünschen, können Sie INSTALL
  286. ECHO. auch folgendermaßen aufrufen:
  287. ECHO.
  288. ECHO.      COMMAND /e:2048 /C install.bat {parameter für install}
  289. ECHO.
  290. IF %COMSPEC%. == . GOTO ENDE
  291. ECHO. Drücken Sie eine Taste zur Ausführung dieser Datei über den Befehl
  292. ECHO.
  293. ECHO.      %COMSPEC% /e:2048  /C install.bat %1 %2 %3 %4 %5
  294. ECHO.
  295. ECHO. oder CTRL-C für Abbruch ...
  296. PAUSE >NUL
  297. ECHO.
  298. ECHO. -----------------------------------------------------------------------
  299. ECHO.
  300. ECHO. ***** Neustart von INSTALL.BAT mit vergrößertem Environment ...
  301. ECHO.
  302. %COMSPEC% /e:2048  /C install.bat %1 %2 %3 %4 %5
  303. GOTO Ende
  304.  
  305. REM --------------------------
  306. :TargetError
  307. ECHO.
  308. ECHO. ***** INSTALL Fehler: Als erster Parameter [Ziellaufwerk] (%1%)
  309. ECHO. *****                 ist nur D: oder C: erlaubt!
  310. ECHO.
  311. ECHO. ***** Verwenden Sie die Form
  312. ECHO.
  313. ECHO.       INSTALL ziellaufwerk quellaufwerk {-│+} X
  314. ECHO.
  315. ECHO  ***** falls Sie ein anderes Laufwerk als C: oder D: als Ziellaufwerk
  316. ECHO. ***** angeben möchten.
  317. GOTO EEnde
  318.  
  319. REM --------------------------
  320. :SourceError
  321. ECHO.
  322. ECHO. ***** INSTALL Fehler: Als zweiter Parameter [Quellaufwerk] (%2%)
  323. ECHO. *****                 ist nur A: oder B: erlaubt!
  324. ECHO.
  325. ECHO. ***** Verwenden Sie die Form
  326. ECHO.
  327. ECHO.       INSTALL ziellaufwerk quellaufwerk {-│+} X
  328. ECHO.
  329. ECHO  ***** falls Sie ein anderes Laufwerk als A: oder B: als Quellaufwerk
  330. ECHO. ***** angeben möchten.
  331. GOTO EEnde
  332.  
  333. REM --------------------------
  334. :SwitchError
  335. ECHO.
  336. ECHO. ***** INSTALL Fehler: Als dritter Parameter (%3) ist nur + [Directorys
  337. ECHO. *****                 erstellen] oder - [Directorys existieren bereits]
  338. ECHO. *****                 erlaubt!
  339. GOTO EEnde
  340.  
  341. REM --------------------------
  342. :Switch1Error
  343. ECHO.
  344. ECHO. ***** INSTALL Fehler: Zuviele Parameter angegeben!
  345. GOTO EEnde
  346.  
  347. REM --------------------------
  348. :DirectoryError
  349. ECHO.
  350. ECHO. ***** INSTALL Fehler: Mindestens ein Ziel-Directory existiert nicht!
  351. ECHO.
  352. ECHO. ***** Verwenden Sie die Form
  353. ECHO.
  354. ECHO.       INSTALL ziellaufwerk quellaufwerk
  355. ECHO.
  356. ECHO. ***** und ignorieren Sie die DOS-Fehlermeldung 'Zugriff abgelehnt' bzw.
  357. ECHO. ***** 'Access denied' 
  358. GOTO EEnde
  359.  
  360. REM --------------------------
  361. REM Unterroutine zur Ausgabe einer Fehlermeldung und zum Lesen einer Taste
  362. REM Eingabe:  %FILE%      = Name des Archivs
  363. REM           %EXT%       = Extension des Archivs
  364. REM           %RETADR%    = Label, an dem die Programmausführung fort-
  365. REM                         geführt werden soll.
  366. REM
  367. :PromptUser1
  368. ECHO.
  369. ECHO. ***** INSTALL - Fehler bei der Installierung von MDEBUG %VERSION% *****
  370. ECHO.
  371. ECHO. ***** Fehler: Kann die Datei %FILE%%EXT% im Laufwerk %Q_LW% nicht finden.
  372. ECHO.
  373. ECHO. ***** Bitte die richtige Diskette ins Laufwerk %Q_LW% einlegen
  374. ECHO. ***** und eine Taste drücken [CTRL-C für Abbruch] ...
  375. PAUSE >NUL
  376. ECHO.
  377. ECHO. ***** Neuer Versuch die Datei %FILE%%EXT% zu finden ...
  378. GOTO %RETADR%
  379.  
  380. REM --------------------------
  381. REM Programmteil zur Ausgabe der Aufruf-Syntax
  382. :HELP
  383. CLS
  384. ECHO. ┌─────────────────────────────────────────────────────────────────────┐
  385. ECHO. │ INSTALL.BAT - Batchdatei zum Entpacken der Archive von MDEBUG %VERSION% │
  386. ECHO. └─────────────────────────────────────────────────────────────────────┘
  387. ECHO.
  388. ECHO. Aufruf:  INSTALL {ziellaufwerk} {quellaufwerk} {+ ODER -} {X}
  389. ECHO.
  390. ECHO.          mit: Ziellaufwerk  = Laufwerk, auf dem die Dateien entpackt
  391. ECHO.                               werden sollen (Voreinstellung: %Z_LW%,
  392. ECHO.                               mögliche Angaben: C: oder D:)
  393. ECHO.                Quellaufwerk = Laufwerk, in dem die Archive von MDEBUG
  394. ECHO.                               sind (Voreinstellung: %Q_LW%,
  395. ECHO.                               mögliche Angaben: A: oder B:)
  396. ECHO.               -             = Directorys nicht erstellen, da sie schon
  397. ECHO.                               vorhanden sind.
  398. ECHO.        ODER   +             = Directorys erstellen, da sie noch nicht
  399. ECHO.                               vorhanden sind. (Voreinstellung: %MKDIRS%)
  400. ECHO.                               (INSTALL verteilt die Dateien auf mehrere
  401. ECHO.                                Subdirectorys im Ziellaufwerk)
  402. ECHO.               X             = Ziel- und Quellaufwerk nicht überprüfen,
  403. ECHO.                               d.h. es sind beliebige Angaben für das
  404. ECHO.                               Ziel- und das Quellaufwerk möglich.
  405. ECHO.
  406. ECHO. ***** Bitte eine Taste zur Ausgabe der Beispiele drücken [CTRL-C für Abbruch]
  407. PAUSE >NUL
  408. CLS
  409. ECHO. ┌─────────────────────────────────────────────────────────────────────┐
  410. ECHO. │ INSTALL.BAT - Batchdatei zum Entpacken der Archive von MDEBUG %VERSION% │
  411. ECHO. └─────────────────────────────────────────────────────────────────────┘
  412. ECHO.
  413. ECHO.                -- Fortsetzung der Syntaxhilfe --
  414. ECHO.
  415. ECHO. Beispiel:  INSTALL D: B: +
  416. ECHO.              - Installieren von MDEBUG im akt. Directory des Laufwerks
  417. ECHO.                D:, wobei die Diskette mit den Archiven im Laufwerk B:
  418. ECHO.                liegt. Die Directorys werden explizit erstellt.
  419. ECHO.                Sie müssen vorher mit dem CD-Befehl im Ziellaufwerk in
  420. ECHO.                das Directory in das MDEBUG installiert werden soll
  421. ECHO.                wechseln.
  422. ECHO.
  423. ECHO. Beispiel:  INSTALL B: A: + X
  424. ECHO.              - Installieren von MDEBUG im akt. Directory des Laufwerks
  425. ECHO.                B:, wobei die Diskette mit den Archiven im Laufwerk A:
  426. ECHO.                liegt. Die Directorys werden explizit erstellt.
  427. ECHO.                Auf dem Laufwerk B: muß noch genügend freier Platz sein!
  428. ECHO.
  429. ECHO.                    -- Ende der Syntaxhilfe --
  430. GOTO ENDE
  431.  
  432. REM --------------------------
  433. REM Programm-Ende
  434. :EENDE
  435. ECHO.
  436. ECHO. ***** Verwenden Sie den Befehl
  437. ECHO.
  438. ECHO.       INSTALL ? [RETURN] 
  439. ECHO.
  440. ECHO. ***** zur Ausgabe einer Syntaxhilfe für INSTALL.BAT.
  441. :ENDE0
  442. ECHO.
  443. ECHO. Beende die Ausführung von INSTALL.
  444. ECHO.
  445. :ENDE
  446. REM --------------------------
  447. REM Löschen der verwendeten Environment-Variablen
  448. SET RETADR=
  449. SET RETADR1=
  450. SET FILE=
  451. SET EXT=
  452. SET Z_LW=
  453. SET Q_LW=
  454. SET MKDIRS=
  455. SET TESTFILE=
  456. SET IgnoreError=
  457. SET VERSION=
  458. SET ART=
  459.  
  460.